home *** CD-ROM | disk | FTP | other *** search
/ CD ROM Paradise Collection 4 / CD ROM Paradise Collection 4 1995 Nov.iso / science / sm32a.zip / LIBRARY / ACOTH.LI < prev    next >
Text File  |  1993-10-16  |  307b  |  12 lines
  1. #    acoth(x) is the inverse hyerbolic cotanget function of x, the inverse
  2. #    of coth(x).
  3. #    See also: coth(x).
  4.  
  5. acoth(0) := pi/2*i
  6. acoth(1) := discont
  7. acoth(1+zero) := inf
  8. acoth(1-zero) := inf+pi/2*i
  9. acoth(inf) := 0
  10. acoth(-inf) := 0
  11. acoth(x_) := if( isnumber(x) and numeric==on, ln((x+1)/(x-1))/2 )
  12.